5 SYS65418:A=PEEK(2):IFA<5ORA>14 THEN POKE2,5
10 POKE53280, 0:POKE53281, 0:PRINT"[147][142]";
11 PRINT"[158]LOADSTARPRESENTS:"
12 PRINT"[159][176]``````````````````````````````[174]"
13 PRINT"}```````[159]}"
14 PRINT"}}[159]}"
15 PRINT"}[155]}[159]}"
16 PRINT"}[155]}}}[183][183]}}[183][183][183][159]}"
17 PRINT"}[152]}}}}[173]``[174][159]}"
18 PRINT"}[152]}}}[175][175]}[175][175][175]}[159]}"
19 PRINT"}[151]}[160][159]}"
20 PRINT"}[151]}[159]}"
21 PRINT"}[151]}[158]AND[159]}"
22 PRINT"}}"
23 PRINT"}```````[159]}"
24 PRINT"}}}[159]}"
25 PRINT"}[155]}}n[159]}"
26 PRINT"}[155]}}[183][183]}}[183][183]}n}[183][183][183][159]}"
27 PRINT"}[152]}}}}}m[173]``[174][159]}"
28 PRINT"}[152]}}}}[175][175]}m[175][175][175]}[159]}"
29 PRINT"}}"
30 PRINT"[221]COMPILEDBYLOUISF.SANDER [159][221]"
31 PRINT"[173]``````````````````````````````[189]"
32 PRINT"[158]PRESSSPACETOCONTINUE"
40 IFPEEK(203)<>60THEN40
50 :
100 DIM NA$(50),FI$(50):TP=1
110 READ NA$(TP),FI$(TP)
120 IFNA$(TP)="END"THENTP=TP-1:GOTO200
130 TP=TP+1:GOTO110
140 :
200 PRINT"[147][158]            TIPS AND TRICKS"
205 PRINT"      [129]COMPILED BY LOUIS F. SANDER"
210 PRINT" [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
215 PRINT" [221]                                    [221]":REM  NA$(1)=""+NA$(1)
220 FORA=1TOTP
230 PRINT" [221]     [154]"NA$(A)"[146]     [221]"
240 NEXT:REM  NA$(1)=RIGHT$(NA$(1),26)
245 PRINT" [221]                                    [221]"
250 PRINT" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
260 :
300 PRINT" [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
310 PRINT" [221]   [154]USE THE CURSOR KEYS TO MOVE THE  [221]"
320 PRINT" [221] HIGHLIGHT [154]UP AND DOWN.             [221]"
325 PRINT" [221]                                    [221]"
330 PRINT" [221]   [154]PRESS RETURN TO SELECT.          [221]"
340 PRINT" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]":RO=PEEK(2):LR=RO:GOTO500
400 POKE198,.:POKE2,RO
410 GETA$:IFA$=""THEN410
420 LR=RO:OK=.
430 IFA$=""THEN RO=RO+1:OK=-1:IFRO=TP+5THENRO=5
440 IFA$="[145]"THEN RO=RO-1:OK=-1:IFRO=4THENRO=TP+4
450 IFA$=CHR$(13)THEN 600
460 IF RO=TP-1+4 THEN 430
470 IF NOT(OK) THEN410
480 :
500 POKE783,PEEK(783)AND254:POKE781,LR:POKE782,7:SYS65520
510 PRINT"[154]"NA$(LR-4)
520 POKE783,PEEK(783)AND254:POKE781,RO:POKE782,7:SYS65520
530 PRINT""NA$(RO-4)
540 GOTO400
550 :
600 ME$="LOADING "+FI$(RO-4)
610 TA=20-LEN(ME$)/2
620 PRINT"[147]"TAB(TA)ME$
630 :
640 D=PEEK(186):PRINT"[144]LOAD"CHR$(34)FI$(RO-4)CHR$(34)",8"
650 PRINT"RUN"
660 POKE631,13:POKE632,13:POKE198,2:END
999 :
1000 REM  "CENTER----->!!<-----RETNEC"
1005 DATA "           JAWS           ",                       JAWS
1010 DATA "      EUROPEAN SIREN      ",                  EUROPEAN SIREN
1020 DATA "      BASE CONVERTER      ",                  BASE CONVERTER
1030 DATA "   DEC <-> HEX CONVERTER  ",                 DEC/HEX CONVERTER
1040 DATA "   START ADDRESS FINDER   ",               START ADDRESS FINDER
1050 DATA "     DISK ERROR READER    ",                 DISK ERROR READER
1060 DATA "       F7 APOSTROPHE      ",                   F7 APOSTROPHE
1070 DATA "       COLOR ADVANCE      ",                   COLOR ADVANCE
1900 DATA "                          ",                    BLANK SPACE
1950 DATA "    RETURN TO LOADSTAR    ",                   HELLO CONNECT
1998 :
1999 DATA "END",END
10000 D=PEEK(186):N$="B.TIPS AND TRICK":OPEN15,D,15,"S0:"+N$:CLOSE15:SAVEN$,D:END